home *** CD-ROM | disk | FTP | other *** search
/ Nebula 2 / Nebula Two.iso / SourceCode / MiscKit1.7.1 / MiscKit / Examples / MailTest / Controller.m < prev    next >
Encoding:
Text File  |  1995-04-17  |  1.1 KB  |  40 lines

  1. //        Written by Don Yacktman Copyright (c) 1995 by Don Yacktman.
  2. //                Version 1.0.  All rights reserved.
  3. //
  4. //        This notice may not be removed from this source code.
  5. //
  6. //    This object is included in the MiscKit by permission from the author
  7. //    and its use is governed by the MiscKit license, found in the file
  8. //    "LICENSE.rtf" in the MiscKit distribution.  Please refer to that file
  9. //    for a list of all applicable permissions and restrictions.
  10. //    
  11.  
  12. #import "Controller.h"
  13.  
  14. @implementation Controller
  15.  
  16. - appDidInit:sender
  17. {
  18.     mailer = MISC_MAILAPP; // launch Mail.app by requesting a connection
  19.     return self;
  20. }
  21.  
  22. - to:sender { return [MISC_MAILAPP setTo:sender]; }
  23. - subject:sender { return [MISC_MAILAPP setSubject:sender]; }
  24. - cc:sender { return [MISC_MAILAPP setCc:sender]; }
  25. - deliver:sender { return [MISC_MAILAPP deliver]; }
  26. - body:sender { return [MISC_MAILAPP setBody:sender]; }
  27. - getWindow:sender { return [MISC_MAILAPP openWindow]; }
  28.  
  29. - doMessage:sender
  30. {
  31.     [MISC_MAILAPP openWindow];
  32.     [MISC_MAILAPP setTo:to];
  33.     [MISC_MAILAPP setSubject:subject];
  34.     [MISC_MAILAPP setCc:cc];
  35.     [MISC_MAILAPP setBody:body];
  36.     return self;
  37. }
  38.  
  39. @end
  40.